home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs13.d81 / acqui2.sda / A19 (.txt) < prev    next >
Commodore BASIC  |  2009-10-10  |  609b  |  24 lines
  1. 10 POKE53272,19
  2. 100 PRINT"[147]":POKE53281,9:POKE53280,0
  3. 101 PRINT"[158]ACQUIRE!!![129]BY[155]EDJIMISON"
  4. 102 FORM=1TO20
  5. 120 PRINT"[129][188][144][188][149][188][188][159][188][188][158][188]";:SYS49664
  6. 130 NEXTM
  7. 140 PRINT"[158]ACQUIRE[129]BY[144]AVALON HILL"
  8. 150 SA$="EHKSEH5LEREYT."
  9. 160 SYS39424
  10. 210 FORM=1TO25
  11. 220 PRINT"[129][190][190][150][190][190][151][190][190][152][190][190][129][190][190][150][190][190][151][190][190][152][190][190][129][190][190][150][190][190][151][190][190][152][190][190][129][190][190][150][190][190][151][190][190][152][190][190][129][190][190][150][190][190][151][190][190][152][190][190][190]";
  12. 230 NEXTM
  13. 232 POKE787,212
  14. 234 FORM=0TO40:SYS49664
  15. 240 PRINT"[158]ACQUIRE[129]BY[155]S.A.M. TRONIX"
  16. 250 PRINTSPC(M)"[188]"
  17. 260 NEXTM:POKE53281,1
  18. 264 FORM=0TO10:SYS49664
  19. 270 PRINT"[144]ACQUIREBY[151]S.A.M. TRONIX"
  20. 280 PRINTSPC(M)"[192]"
  21. 300 NEXTM
  22. 555 POKE806,0:POKE807,195:POKE251,90:POKE45,239:POKE46,130
  23. 556 LOAD"A12",8:RUN
  24.